Imports CapaDeDatos
Public Class nDetalleRemitoServicios
    Private TblDetalleRemitoServicio As CapaDeDatos.dDestalleRemitoServicio = New CapaDeDatos.dDestalleRemitoServicio
     Public Function Insertar(ByVal Cantidad As Long, ByVal Subtotal As Double, ByVal CodigoRemito As Long, ByVal CodigoLista As Long) As Boolean
        Return TblDetalleRemitoServicio.Insertar(Cantidad, Subtotal, CodigoRemito, CodigoLista)
    End Function
    Public Function Listar() As DataSet
        Return TblDetalleRemitoServicio.Listar()
    End Function
    Public Function Modificar(ByVal CodigoDetalleServicio As Long, ByVal Cantidad As Long, ByVal Subtotal As Double, ByVal CodigoRemito As Long, ByVal CodigoLista As Long) As Boolean
        Return TblDetalleRemitoServicio.Modificar(CodigoDetalleServicio, Cantidad, Subtotal, CodigoRemito, CodigoLista)
    End Function
    Public Function Eliminar(ByVal CodigoDetalleRemito As String) As Boolean
        Return TblDetalleRemitoServicio.Eliminar(CodigoDetalleRemito)
    End Function
    Public Function Buscar(ByVal CodigoDetalleServicio As Long, ByVal Cantidad As Long, ByVal Subtotal As Double, ByVal CodigoRemito As Long, ByVal CodigoLista As Long) As DataSet
        Return TblDetalleRemitoServicio.Buscar(CodigoDetalleServicio, Cantidad, Subtotal, CodigoRemito, CodigoLista)
    End Function
End Class
